﻿Public Class PostulanteFalloAlta
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante el alta del Postulante")
        Me.codigo = Utils.Enumeradores.Excepeciones.PostulanteFalloAlta
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante el alta del Postulante"
        Me.innerException2 = innerException
    End Sub
End Class

Public Class PostulanteFalloEditar
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante la actualización del Postulante")
        Me.codigo = Utils.Enumeradores.Excepeciones.PostulanteFalloEditar
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante la actualización del Postulante"
        Me.innerException2 = innerException
    End Sub
End Class

Public Class PostulanteFalloBaja
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante la baja del Postulante")
        Me.codigo = Utils.Enumeradores.Excepeciones.PostulanteFalloEliminar
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante la baja del Postulante"
        Me.innerException2 = innerException
    End Sub
End Class

Public Class PostulanteFalloBuscar
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante la búsqueda del Postulante")
        Me.codigo = Utils.Enumeradores.Excepeciones.PostulanteFalloBuscar
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante la búsqueda del Postulante"
        Me.innerException2 = innerException
    End Sub
End Class

Public Class PostulanteFalloConsultar
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante la consulta de Postulantes")
        Me.codigo = Utils.Enumeradores.Excepeciones.PostulanteFalloConsultar
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante la consulta de Postulantes"
        Me.innerException2 = innerException
    End Sub
End Class
